home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1995 October / EnigmA AMIGA RUN 01 (1995)(G.R. Edizioni)(IT)[!][issue 1995-10][Aminet 7].iso / Aminet / util / batch / Mousek.lha / MouseK / mousek.e < prev    next >
Text File  |  1994-10-04  |  343b  |  16 lines
  1. /* $VER: Mousek.e 1.1 (7.5.94) ©1994 Michael Askin
  2. ** Return code is mouse button status.
  3. ** 0 - No button pressed
  4. ** 1 - Left button
  5. ** 2 - Right button
  6. ** 3 - Both buttons
  7. **
  8. ** Language : AmigaE 2.1b
  9. */
  10.  
  11. PROC main()
  12.    VOID('$VER: Mousek 1.1 (7.05.94) ©1994 Michael Askin.. Return code is mouse button status')
  13.    CleanUp(Mouse())
  14. ENDPROC
  15.  
  16.